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MACROS 


CREAR MACROS EN MS EXCEL 


Introducción 


Microsoft Office Excel, permite 
trabajar con las macros. Lo que se 
pretende es automatizar varias 
tareas y fusionarlas en una sola, 
añadiendo por ejemplo un botón en 
nuestro libro que al pulsar sobre él 
realice todas esas tareas. 





Es posible que en tu área de trabajo, se realicen tareas repetitivas, cálculos 
complicados con las hojas Excel, desperdiciando mucho tiempo en realizar los 
cálculos, resúmenes de datos e informes de manera manual. Al aplicar las 
macros, podrás darte cuenta que con un simple clic a un botón en cuestión de 
segundos todas esas tareas estarían realizadas. 


En esta unidad de estudio con las macros aprenderás a automatizar y realizar 
tareas complejas, aumentando la eficiencia y eficacia del trabajo. 


PREPARAR EL LIBRO DE EXCEL PARA TRABAJAR CON MACROS 


Una macro es una serie de instrucciones que se almacenan para que se 
puedan ejecutar de forma secuencial mediante una sola llamada u orden de 
ejecución. 


Con las macros lo que se pretende es automatizar varias tareas y fusionarlas 
en una sola, añadiendo por ejemplo un botón en nuestro libro que al pulsar 
sobre él realice todas esas tareas. 


Términos que se utilizan cuando se crean Macros: 


. VBA: Visual Basic para Aplicaciones, el lenguaje de código de macros. 
. Módulo: Contenedor para almacenar macros, asociado a un libro. 


Lo primero que debes hacer en Excel 2010, para empezar a grabar una macro 
es: 


Habilitar la pestaña Programador. 
Para esto realiza lo siguiente: 
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+ Haz clic en Archivo. 
. Selecciona Opciones. 


1. Selecciona Ubro? - Mierosoh Excel 








—9 1 ABBR 








2. Selecciona 





ES 








alfab, internacional | £3 | 


[Bes mm O 


(lu o »|d 





+ Haz clic en la opción Personalizar cinta de opciones. 
. Activar con un visto la opción Programador. 


+ Haz clic en Aceptar. 


Opciones de Excel 


General "] 

Ga] Personalice esta cinta de opciones 
Formas 

Comandos disponibles en: 


Revisión Comandos más utilizados 


Guerdar 
ES Abe 

1%) Abrirarchivo reciente, 
Actualizar todo 
Administrador de nombres 
Aumentar tamaño de fuente 
Bordes 

Calcular ahora 

Centrar 

Color de fuente 

Color de relleno 

Combinar y centrar 
Conexiones 

Configurar página 

Copiar 

Copiar formato 

Correo electrónico 

Contar 

Deshacer 

Disminuir tamaño de fuente 
Eliminar celdas. 

Eliminar columnas de hoja 
Eliminar filas de hoja 
Establecer área de Impresión 
Fitto 

Formas 

Formato condicional 
Formato de celdas... 

Fuente 

Guardar 


Idioma 


Avanzados 


Complementos 


Centro de confianza 


AS RS ANA AA 


dl 


3. Selecciona 


Se visualiza: 





Personalizar la cinta de opciones: 
Fichas principales 


Fichas principales 
2 [A] inicio 
Y Portapapeles 
E Fuente 
$ Alineación 
3: Número 
8 Estilos 
+ Celdas 
y Modificar 
2 [Z insertar 
E [Y] Diseño de página 


3 [4] Eliminación del fondo S 





Nugva ficha Huevo grupo Cambiar nombre... 
Personalizaciones: | Restablecer Y 
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¿ E í 
úl la pestaña 


PEVRIRRENNE RADAR aros Ez 
E TO 
End 
E 
id 
| 
A 
z 
9 


EOS 


a + CPE ETIS ez, 
Luego guarda tu libro de Excel como libro de Excel habilitado para macros, 
cuya extensión es .xlsm. 
Para esto realiza lo siguiente: 


. Selecciona Archivo. 


e Haz clic en Guardar como. 
. Se visualiza: 






1. Selecciona 


7 Libre? - Microsoft Excel AS 
des: Degree o 
7 la Libro2 
il Gure > 2: 
dd cena > , onde abre, copan y cambiar custquer pere de este hito, 
ETA - 2.Selecciona 
heces | Guardar as . 
Metro. A - en cuenta ayu cor = 
O 








Pay prctiemas 





Ifalfab.internacional) | 23 | (8.2,.= 130% ( 


+.  Digita un nombre por ejemplo, miprimeramacro. 
. Verifica que sea del tipo Libro de Excel habilitado para macros. 
e Haz clic en Guardar. 
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Guardar como 2 ¡A ) 


[EZ WWBOXSVRImanwal_excel_2010 3530-A xa 







































inbredenióo: Erre —] > 
ios 


Herramientas >| 





ecciona Libro de Excel 
b] 


ÉS 





HAS 


Para habilitar las seguridades de las macros realiza lo siguiente: 








ezo 
Qosra 
N o = 
15 
19 
2 
a 
2 
a 
24 
25 
26. 
27 
2 
29 
El 
a 
2 
3 
MOCFA Mojas Hopa2 Mod 9 del un 
O] METAS 


+. Selecciona la pestaña Programador. 
+ Haz clic en Seguridad de macros. 
+. Se visualiza: 
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Centro de confianza 
Editores de confisnza 
Configuración de macros 
Ubicaciones de confianza | e 
O Deshabilitar todas las macros sin notificación 
Documentos confiables O Deshabilitar todas las macros con notificación 


Complementos 


Destabllfariod masia a nadas di dalES 
(5) Habilitar todas has macros [no recomendado; puede ejecutarse código posiblemente peligroso] 
Configuración de Activek | 


ista protegida 


Barra de mensajes - 


3. Haz clic en 





+ Haz clic en Configuración de macros 

. Selecciona Habilitar todas las macros (no recomendado; puede 
ejecutar código posiblemente peligroso) 

. Haz clic en Aceptar 


GRABAR MACROS 


La forma más fácil e intuitiva de crear macros es crearlas mediante el grabador 
de macros del que dispone Excel. 


2 Grabar macro 


Este grabador de macros te permite grabar las acciones deseadas que 
posteriormente las traduce a instrucciones en VBA, las cuales podemos 
modificar posteriormente si tenemos conocimientos de programación. 


Cuando grabe una macro, la grabadora de macros graba todos los pasos 
necesarios para completar las acciones que deseas grabar. 


Práctica 


Para crear la macro que permita dar a cualquier celda el formato de letra Comic 
Sans MS, de tamaño 18, color azul y negrita. 


Realizaremos la siguiente secuencia: 


. Selecciona la celda C4. 
+.  Digita Hola amiguit(Ws!! 
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+. Antes de iniciar la grabación selecciona la celda C4, pues así podrás ir 
visualizando que se aplica el formato solicitado. 

+. Selecciona la ficha Programador. 

+ Haz clic en Grabar macro. 









3. Haz clic en 


Tfimpara 





» y 
| Enernioega] | 





ala fije lo 


1. Selecciona la 
- celda que contiene 
un texto 


+. Otra opción para grabar la macro es hacer clic en el icono 


+ Con cualquiera de las opciones se visualiza el cuadro de diálogo Grabar 
macro. 
+ En Nombre de la macro, digita un nombre para la macro. 


Sugerencias para el nombre de la macro: 


. No iniciar con números, no contener espacios en blanco, ni caracteres 
especiales (WM, €), ni palabras reservadas del lenguaje de programación 
(else, if, end). 


. En Método abreviado: ingresa una combinación de teclas para la 
ejecución de la macro. Se sugiere que sea en minúsculas, pues así en el 
momento d ejecutarla se presionará simultáneamente las dos teclas, 
para el ejemplo, Crtl + f. 

+ En Guardar macro en, selecciona En este libro, para que la macro se 
guarde en el archivo que se está guardando la macro. 


. En Descripción, se digita un texto que describa lo que realiza la macro; 
este punto es opcional. 
+ Haz clic en Aceptar. 
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Grabar macro 4. Digita un nombre 
- para la macro 









5. Digita un carácter para el 
étodo abreviado 









y 
7. Ingresa una 
descripción 













8. Haz clic en 


cad... 


Observa que el icono cambia a | lo que indica 
que se está grabando la macro. 

Luego empieza a grabar los formatos solicitados, por ejemplo, para 
seleccionar el color de fuente realiza lo siguiente: 

Selecciona la ficha Inicio. 

Haz clic en Fuente. 

Elige el color, para el ejemplo el color azul. 
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[ena =o. u- deletra y tamaño 


LO ola amg 


el color de la 


Sn 
fuente 





13. Haz clic bl 
15 n Aceptar 





2! Mojas .- Moja2 Hejas 1 a 
100) 








. De similar forma selecciona el tipo de fuente solicitado, para el caso, 
elige Comic Sans MS. 


+. Selecciona la fuente, elige 18. 


. Finalmente, aplica negrita. 
+. Visualiza el formato que acabas de grabar en la macro. 
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IN AS miprimeramacro - Microsoft Éxcol sen 
ampóos aQes3$na 
En > > 
8 y; 
6 H 1 1 * E M RN SE 
1 
2 
3 
z Letra Comic Sans Ms, 
6 tamaño 18, color azul 
s — 
, A 
> 14. Haz clic en 
z E 
13 
WU 
15 
13 
Y 
3 
19 
2 
a 
2 
2 d = 
24 mE Se $ 
» También puedes detener la 
2» Al 
macro haciendo clic en el icono 
« = $ 
na 300% (=) $ 





| 
+. Para detener la macro haz clic en 
+ También puedes detener la macro si realizas lo siguiente: 


+. Selecciona la ficha Programador. 
+ Enelgrupo Código, haz clic en Detener grabación. 
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247 > miprimeramacro - Microsoft Excel 
En poco | Imietar  Diceñs depógino  Férmules Catón Revisar vit» Piogramadór 
€ TAE A Dai carita : >» 3 a 
ps NAG- o A EE ER conce: A A unas o cio 
A Fierte , PS ES y ceaas d 
ca - Se e. 
lí A o. JN e € E 3 4 1 y K t mM COR 
1 
2 
3 
4 Hola AmiguitOs! ' 
E Letra Comic Sans Ms, 
6 V tamaño 18, color azul 
> . negrita. 
3 
2 . . » 
1 Visualiza el 
u 
E resultado 
u 
L 
16 
Y 
13 
15 
2 
a 
Ez] 
2 
24 
25 
26 
2 
PS 
E) 
0 
3 
32 ” 
LR Mejor TA gal añ »8 
timo 1:23 MA 100 > 


Observa que la macro se ha detenido. 


+ Observa que el icono cambia de a' lo que 
indica que se ha detenido la grabación de la macro. 


+ Una vez grabada la macro puedes probar su ejecución. Para esto 
realiza lo siguiente: 


.  Digita un texto en una celda. 
. Selecciona la celda que contiene el texto. 


10 


INTRODUCCIÓN A LA PROGRAMACIÓN EN EXCEL CON 
VISUAL BASIC APPLICATION 





. Presiona simultáneamente las teclas asignadas en el método 
abreviado, para el ejemplo, presiona simultáneamente las teclas 


| | 
[) 
y la tecla f “uuu, 














Mia ie miprimeramacto - Microsoft Excel Ses 
lc ] so | Tosetar Omaña cepógino — Fómmpies  Omos Reme Vita Programador 2Q>o9n 
rm AA == Y Dawn = Geraril . m > | > e Y 57 

l iy> me , 

9 y NEGADA A? EEE RE ona Elo tormate y o 

Fortapap _ Eoente A aleación Piero ] Mos 
cs ga Le Paty Acosta ye 
] 
A 8 b E E 6 H 1 1 K £ M 2 

Hola AmiguitOs! 7 
Letra Comic Sans Ms, 





y Acosta __ . | 


mod, 2. 










2. Ejecuta la macro, 
presionando el método 
abreviado, visualiza el 


a 





1 

2 

3 

4 

5 

6 

2 

z 

10 
a 
py] 
13 
la 
15 
16 
17 
18 
19 
2 
a 
2 
po] 
zu 
25 
26 
y 
23 
2 
30 


34 





Otra forma de ejecutar es: 


. Selecciona la ficha Programador. 
. Enel grupo Código, selecciona Macros. 
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2. Haz clic en 


3 


5] Mojox Mol32. Has 


, 2 Haas a da > 
rr] A o 


+. Se visualiza el cuadro de diálogo Macro. 
. Selecciona la macro que creaste, para el ejemplo, formato_azul. 
+. Haz clic en Ejecutar. 


Nombre de la macro: 





[Formato_aAyL po —» 
3. Selecciona 


la macro a 
jecutar 











Macros en: Todos los libros abiertos 
Descripción 
Letra Comic sans Ms, tamaño 18, color azul, negrita. 


Cancelar 





ACCESAR AL AMBIENTE DE VISUAL BASIC 


Cuando deseas modificar o revisar el código generado en una macro, es 
necesario ingresar al ambiente de Visual Basic, para esto realiza lo siguiente: 
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+. Selecciona la ficha Programador. 
+ Haz clic en Macros. 


e Microsoft Excel oa a 





> 





+ Visualiza el cuadro de diálogo Macro. 
. Selecciona la macro a modificar. 
e Haz clic en Modificar. 

















+. Visualiza el código que contiene la macro. 
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1 foxmáro_azul Maceo 

1 Macro que permita der a cuniquier celda el formato de lerza Comic Jana RS, de tamaño 15, color 
* Creada por Parricia Acosta 

' heceso directos CTRL+E 

' 


Vich Selection. Font 
«Name = “Comic Sans RS" 
«Size - 18 
«Frrikerhrough = Folso 
«Buperscript » False 
«Subsoript * False 
«OutlineFont = Faise 
-Fhadov " Palse 
«Underline » xlUnderline3StyleNone 
«Color = -65536 
«Tintáind5hade -= O 
-ThemeFont * <1ThermePontNone 


End With 
Selection.Font.Bold + True 


End 3ub 





. Otra forma de accesar al ambiente de Visual Basic es: 
. Selecciona cualquier hoja de tu libro de Excel. 

e  Hazun clic derecho. 

. Selecciona Ver código. 


14 


INTRODUCCIÓN A LA PROGRAMACIÓN EN EXCEL CON 
VISUAL BASIC APPLICATION 


























+ Visualiza el cuadro de diálogo de Microsoft Visual Basic. 

+ Haz clic en Módulo1. 

+ Si no presenta esta pantalla, haz clic en Ver, y selecciona Explorador 
de proyectos. 


0 AA UBA 3 








-3.- Haz dale 








. Una tercera forma de accesar al ambiente de Visual Basic es: 
+. Selecciona la ficha Programador. 
e Haz clic en Visual Basic. 
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1. Seleccione la 
pestaña 


Panes de 





Y asc IAR FIN) y Acosta 
pora 


e 


| 2. Haz clic en miguitOs! n= 
, Letra Comic Sans Ms, 
Basic tamaño 18, color azul 
negrita. 


Paty Acosta 


432 Mopaa Hoga2 Had HL +3 


LPERZTS 


Finalmente, puedes accesar al ambiente de Visual Basic, presionando 
simultáneamente las teclas Alt y F11 


MODIFICAR MACROS 


Por ejemplo, modifica en la macro el tipo de letra Arial y de tamaño 20. 
Para realizar este cambio realiza lo siguiente: 


+. Selecciona la ficha Programador. 
+ Haz clic en Macros. 
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ias 


ao oa 
tico  intetar  Oiseñodepigina — Pásmulos ato Mo .. 






+ 
21 z 
JAP MojoA Mosa2 Mesas a del 
Ma 





CREA 10 mes 


+. Visualiza el cuadro de diálogo Macro. 
. Selecciona la macro a modificar. 
e Haz clic en Modificar. 





+. Visualiza el código que contiene la macro. 
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«Buperacripe 
«Subacript » False 
«OutlineFont = False 
3 - Pal: 


$ 20 
+Underline = xlUnderlineStyleNone 
«Color = -65536 

»+TintándShade -= O 

-ThemeFont = x1ThemaFontNone 


End vith 
Selection. Font.Bold - True 











Observa el código de la macro: 
Una macro inicia en: 


Sub formato_azul() 
y termina en End Sub 


formato_azul() Es el nombre de la macro. 
El texto en color verde, son comentarios que puedes colocar en tu macro; estos 


no son interpretados por el compilador de Visual Basic. Para comentar una 
línea se utiliza un apóstrofo (*). 


1 Sub formato_azul() 

2 ' formato_azul Macro 

3 ' Macro que permita dar a cualquier celda el formato de letra Comic Sans MS, de tamaño 
4  ' 18, color azul y negrita 

5 ' Creada por Patricia Acosta 

6 'Acceso directo: CTRL+f 

7 With Selection.Font 

8 - Name = "Comic Sans MS” 

9 .Size = 18 

10 «Strikethrough = False 

41 «Superscript = False 

12 «Subscript = False 

13 .OutlineFont = False 

14 «Shadow = False 

16 .Underline = xlUnderlineStyleNone 
16 «Color = -65536 

17 .TintAndShade = 0 

18 .ThemeFont= xIThemeFontNone 


19 End With 
20 Selection.Font.Bold = False 
21 End Sub 
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A continuación se explica el significado de cada línea del código generado en el 
lenguaje de Visual Basic: 


1 Inicia la macro de nombre formato_azul(). 

Desde la línea 2 a la 6 son comentarios de la macro que no son 
interpretados por el compilador. 

7 Función que agrupa las propiedades del objeto fuente. 

8 Selecciona la fuente de nombre "Comic Sans MS". 

9 Aplica el tamaño de 18 a la fuente seleccionada. 

10 Desactiva el tachado de fuente. 

11 Desactiva la opción de superíndice a la fuente. 

12 Desactiva la opción de subíndice a la fuente. 

13 Sin aplicar esquema a la fuente. 

14 Sin sombra. 

15 Sin subrayado. 

16 Color azul. 

17 Color de tema neutro. 

18 Sin tema de fuente. 

19 Cerrar la función que agrupa a las propiedades de la fuente. 
20 No aplicar negrita a la fuente. 

21 Cerrar la estructura de la macro. 


Para modificar la macro ingresa al ambiente de Visual Basic, edita la 
macro y realiza los cambios. 

Modifica en .Name ="Arial" 

Y en .Size=20. 

Visualiza los cambios: 
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suo formato azul 0 


| formáro_ezul Macro 

1 Macro que permica dar a cualquier celda el formato de lerra Comic Jana 5S, de vamaño 18, color 
! Creada por Patricia Acosta | 
1 kopeso dicecto: CTRL+L 


Vich Selection. vpo 


rrinerhccot » False 
«Superscript » False 

«—Subsocipt » False 

,QutlineFont = Paisa 

«Shadow = False 

-Orderline » ES 


pe 
«ThemaFont = x1ThepeFontWone 


End Vich 
Selection. Font.Bold = True 


End 3ub 





+. Visualiza que se han modificado las líneas 8 y 9. 


1 Sub formato_azul() 

2 ' formato_azul Macro 

3 ' Macro que permita dar a cualquier celda el formato de letra Comic Sans MS, de tamaño 
4 '18, color azul y negrita 

5 ' Creada por Patricia Acosta 

6 ' Acceso directo: CTRL+f 

7 With Selection.Font 

8 .Name = "Arial" 

9 «Size = 20 

10 «Strikethrough = False 

1 «Superscript = False 

12 «Subscript = False 

13 .OutlineFont = False 

14 «Shadow = False 

15 .Underline = xlUnderlineStyleNone 
16 .Color = es 

17 .TintAndShade = 

18 .ThemeFont = e ecalliin 
19 End With 

20 Selection.Font.Bold = False 

21 End Sub 


. Guardar los cambios. 
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CÓDIGOS MÁS COMUNES EN MACROS 


Trasladarse a una Celda 
Range("A1").Select 


Escribir en una Celda 
Activecell.FormulaR1C1="Paty Acosta" 


Letra Negrita 
Selection.Font.Bold = True 


Letra Cursiva 
Selection.Font. Italic = True 


Letra Subrayada 
Selection.Font.Underline = xlUnderlineStyleSingle 


Centrar Texto 

With Selection 
.HorizontalAlignment = xlCenter 
End With 


Alinear a la izquierda 

With Selection 
.HorizontalAlignment = xlLeft 
End With 


Alinear a la Derecha 





21 


INTRODUCCIÓN A LA PROGRAMACIÓN EN EXCEL CON 
VISUAL BASIC APPLICATION 





With Selection 
.HorizontalAlignment = xIRight 
End With 


Tipo de Letra(Fuente) 
With Selection .Font 
.Name = "AGaramono" 
End With 


Tamaño de Letra(Tamaño de Fuente) 
With Selection.Font 

Size = 15 

End With 


Copiar 
Selection.Copy 


Pegar 
ActiveSheet.Paste 


Cortar 
Selection.Cut 


Ordenar Ascendente 
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _ 
OrderCustom:=1, MatchCase:=False, Orientation:=xITopToBottom 


Orden Descendente 
Selection.Sort Key1:=Range("A1"), Order1:=xIDescending, Header:=xlGuess, _ 
OrderCustom:=1, MatchCase:=False, Orientation:=xITopToBottom 


Buscar 
Cells.Find(What:="Paty Acosta", After:=ActiveCell, LookIn:=xIFormulas, LookAt 


“=xIPart, SearchOrder:=xIByRows, SearchDirection:=xINext, MatchCase:= _ 
False).Activate 


Insertar Fila 
Selection.EntireRow.Insert 


Eliminar Fila 
Selection.EntireRow.Delete 


Insertar Columna 
Selection.EntireColumn.Insert 


Eliminar Columna 
Selection.EntireColumn.Delete 
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Abrir un Libro 
Workbooks.Open Filename:="C:iMis documentosimiarchivo.xls" 


Grabar un Libro 
ActiveWorkbook.SaveAs Filename:="C:IMMis documentosltauro.xls", FileFormat 


:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= 


False, CreateBackup:=False 


ASIGNAR UNA MACRO A UN BOTÓN DE FORMULARIO 
Una macro puede ser asignada a un botón de formulario. 


Práctica 


Realizar una macro que calcule el valor de la cantidad por el valor del producto. 
Luego permitir que se arrastre la fórmula y asignar la macro a un botón de 
formulario. 


La solución al ejercicio planteado es la siguiente: 


. Selecciona la ficha Programador. 
+ Haz clic en Grabar macro. 
+. Se visualiza el cuadro de diálogo Grabar macro. 
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GAL FACTURA. réjuman factura. productos —QUENTES 93 Za A e 
fa] n n 








+ En Nombre de la macro digita el nombre calcular_valor. 

+ En Guardar macro en, selecciona Este libro. 

+. En Descripción, digita una descripción la mima que es opcional. 
. Haz clic en Aceptar. 


Grabar ma 
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Haz clic en fx. 

Se visualiza el cuadro de diálogo Insertar función. 

Haz clic en SI.ERROR. 

Se visualiza el cuadro de diálogo Argumentos de función. 


En Valor digita la fórmula D14*E14. 
En Valor_si error digita 0. 


Arrastra la fórmula. 


Haz clic en Detener grabación. 


Asignar la macro a un botón de Controles de formulario 


Selecciona la ficha Programador. 
Haz clic en Insertar. 
En el grupo de Controles de formulario; selecciona el botón. 






1. Seleccione 


> 








IN 
[SA + 2. Haz clic en | PE 
1 
a | 7 Soop e importar » 
8] 2 o 
— - e > E Paquetes de expansión A 
Viva) Mia lodo Otigen mel de 
se seño Y Ejecutar cuecro de diálogo Preer 








XML Mogtitar 


3. Selecciona el 


PROFORMA - botón 


Cliente: ACOSTA VARGAS NELLY PATRICIA Fecha: Jimay 
Forma de pago: CREDITO 
Teléfono: 2545: 











Dibuja el botón en un área de la hoja de cálculo. 
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+. Visualiza que se activa el cuadro de diálogo Asignar macro. 

. Selecciona la macro creada anteriormente, en este caso 
calcular_valor. 

. Haz clic en Aceptar. 









paraejer 


Fórmulas Datos Revisar Vista Programados Formato 


Complementos 





Cliente: ACOSTA VARGAS NE] 
RUC: — "1802452944001 | 
Direccio ALMAGRO 1822 


[018 [Caja 100 Dvds | 6. Haz clic en 
(010 [Caja 10 Cds | á 











Se visualiza: 


O A facturacion parsejercicio - Microsoft Excel E 
ET Inicio. insertar Diseño de pagina Fórmulas Datos Rentar Vista Programados 
dió rm Grabar macro 


12 [Pl tesar referencias retatrrss 
Complementos 





idad de macros 





3 31 
Forma de pago: CREDITO 
Teléfono: 








+. Digita un nombre para el botón; por ejemplo, Calcular total. 
+. El botón está listo para ejecutar el cálculo del Valor total. 
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+ Si deseas probar borra el rango de F14 a F23; presiona el botón 
Calcular Total; podrás observar que se borran los datos comprendidos 
en el rango de F14 a F23. 




















Ed o-e- facturacion paraejercicio - Microsoft Excel | 
Em Inicio Insertar Diseño de página Fórmulas Datos Revisar Vista Programador 
= 3 
K | Insertar DM de 
, = ommño Y Sea 
A. Código ¡RE 
[ Botón1 E fe 
CARITA Cc F $21 
z e A 
Calcular Tot 

a c cular Total, 

4 < 

5 

6 

7 

8 E 31-ma' 

9 Forma de pago: CREDITO 

10 

1 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 Subtotal 0,00] 

25 DISTRIBUIDOR MINORISTA [Descuento 0,00) 

26 Impuesto 12% IVA 0,00) 

27 TOTAL 0,00) 

28 ' 


Una macro puede ser asignada a una forma. 


Práctica 
La macro creada anteriormente asígnala a una forma. 
La solución al ejercicio planteado es la siguiente: 

+. Selecciona la ficha Insertar. 


e Haz clic en Formas. 
. Selecciona una forma. 
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aaa (A. lO! 











Table rtArt Captura  Cobumna Línea Circula Barra Area Dispersión Otros 
Ginámica * . . ” - . - . 
Tablas L POAAS usadas recientemente a | GIMcOoS MA] 
FS ESE xNUODALLOSO a 
—. e ION a 
1 Líneas | 
3 Calcular tora | >) SN TALA RINA | 
. Rectángulos E A So 
. SODOSdDDON 3. Selecciona 
una forma 
6 : ont : 
7 96601 7 o 
e [Cliente ACOSTA VARGAS 1 1! NULOS 
2 = "1802452944001 (00114 Cara sonmiente 









10. [Direccic ALMAGRO 1822. Mechas de bloque 
1 DEPORITFAAPASY A 
GIVADID DEE 
ERA 

Formas de ecuación 

$=i po 

Diagrama de flujo 
caegotu09dooar 
0UU00BB6I4AVaED 
aga 


Cintas y estrellas 
SU+ro0000008 
SA 













Llamadas 
DPPDALGA Ad 
000 





Selecciona la forma. 
Elige un color de relleno para la forma. 
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Ed ej 


QBx suo 
DALLOO:- 8 


Oé=> FO YE 
GNL )3> 











Insertar formas 


¡WU MARES Estilos de Wordán 





6. Elige un color 
para la forma 






PROFORMA Sig telleno 

| Has colores de reñeno, 
imagen. 
Degradado 


Textura 





Descuento 
Impuesto 12% IVA 
[TOTAL 











Selecciona la forma. 
Haz clic derecho sobre la forma. 
Selecciona Asignar macro... 
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EE facuracio) 


EN Inicio Insertar Diseño de página 
ODM >DO - Later torma - 
DATLDO - El cusco seteno (-) 


GAL Ji 


Programador For 


“. 
= AA 
mas + 

, Est 





insertar formas 





|. ]Carasonriente vz 






















PAVAO E A E E E G 
] — Mi APPEARS 
a ssijeros | = 
4 pa. ae ' h 
5 Aa Copiar ; 
Opciones de pegado: 
6 PRO > 
7 Est y 
6 [Cliente: ACOSTA VARGAS NELLY PATR (2) Modgicartento A ( 
A . ALOE 1624 LL Moaéicar guntos 
13 El 
12. ¡Y Traer al free 
5 ab ad Cantit dy Eomacal fondo 
15 
16 
17 
18 
do $] Tamaño y propiedades 
2% Y, Eormato de torma.. 
2 
23 
24 
25 
26 
27 
28 


+. Se visualiza el cuadro de diálogo Asignar macro. 
+ Haz clic en la macro calcular_valor. 
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WARS] amado insertar Diseño de página Fórmulas Datos Revisar Vista Programador Formato 
un 


Codigo Complementos Controles 
1 Cara sonriente + Ke 


AB 


E : sn 
1 a . o 
: Calcular Total ES 
4 O 9] 
5 





Í Mos 7 
9. Selecciona la 





macro 












Direccio ALMAGRO 182] PETER 
y  (_-—_—— 





|_ttem_| Descripei 
1018 [Caja 100 Dvds 





PREPARAR EL LIBRO PARA TRABAJAR CON CONTROLES ACTIVEX 
Una de las opciones más interesantes que tiene Excel 2010 es la de utilizar los 
“cuadros de control”. Los cuadros de control se aplican para crear 
verdaderos programas en Excel y pueden ser de mucha utilidad. 


Lo primero que debes hacer para trabajar con los cuadros de control en Excel 
2010, es preparar el libro; recuerda aplicar lo estudiado anteriormente en la 
unidad de macros. Para esto sigue el siguiente proceso: 


Lo primero que debes hacer en Excel 2010, para empezar a grabar una macro 
es: 


Habilitar la pestaña Programador. 
Para esto realiza lo siguiente: 


+ Haz clic en Archivo. 
. Selecciona Opciones. 
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e Cuslquin usuario puede abrx, copiar y carmibiar cualquer pare de este lero 
| momen pa 

Recene 

Preparar para compartir 
Nuevo. o j Actes de comparti ete aschro, Tenga en cuenta que conbene 
PR Propiedades del documento y nombre del mor 
teorias Cemprober si 
hay protiemas - 


: 


Vervones 


9) Me enen vervones artecoces de este eche 






2. Selecciona 


alfab, internacional) || 3 | 


Libro? - Microsoft Excel 














Haz clic en la opción Personalizar cinta de opciones. 


+. Activar con un visto la opción Programador. 


+ Haz clic en Aceptar. 


6 3 120 OY = 
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Opciones de Excel 


q 
General 


Fórmulas 
Revisión 


Guardar 


idioma a 


| Avanzadas 


Complementos 





Centro de confianza 


Selecciona. 


A A 


1 io > 








Se visualiza: 


£omandos disponibles en: 
Comandos mas utilizados 


“l Personalice esta cinta de opciones. 
o! 





Abrir 

Abrir archivo reciente... 
Actualizar todo 
Administrador de nombres 
Aumentar tamaño de fuente 
Bordes 

Calcular ahora 

Centrar 

Color de tuente 

Color de relleno 

Combinar y centrar 
Conextones 

Configurar página 

Copiar 

Copiar formato 

Correo electrónico 

Cortar 

Deshacer 

Disminuir tamaño de fuente 
Eliminar celdas... 

Eliminar columnas de hoja 
Eliminar fitas de hoja 
Establecer área de impresión 
Filtro 

Fotmas 

Formato condicional 
Formato de celdas... 

Fuente 

Guardar 


Agregar >> 


Personalizar la cinta de opciones: 
Fichas. principales ws 


Fichas principales 
¡2 inicio 
E Portapapeles 
E Fuente 
[8 Alineación 
4 Numero 
(4 Estilos 
[5 Celdas 
% Modificar 
[Y] insertar 
E [4] Diseño de página 
2) [4] Formulas 
¡5 [9] Datos 
[Y] Revisas 
a 







Man =$n 
Ea bicó | Infetar  Oiteñocepógins — Fórmulas Oat0s. Rear Vota oQo9.2 
sz A DL ] : WE? Sl E ato $ 
YA a AOS Y m3 e 
Pegar *e.s- . die DE comes y dertras + a, Formato — Opstormano Litas de insertas Crear Formato Orñenas — burtaly 
A EST E Pe AA oir no ar er” . . Len ye = seleco0 > 
POnanO— a Fuerte % Alesón . ; a Eatdos Colas Mota 
A - fe; 








€ LJ E 


MT 
> 


EN 
ICA] ojal Hago: Hd 
o 





20001) 


valiza la pestaña — 


Ll 





| 


vE 





(CATE! 





Luego guarda tu libro de Excel como libro de Excel habilitado para macros, 


cuya extensión es .xlsm. 


Para esto realiza lo siguiente: 


. Selecciona Archivo. 
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e Haz clic en Guardar como. 
. Se visualiza: 






1. Seleccion 


mos Reme veta Programados 


la Libro2 El 


hal Gunear como 


dl cen > - 
E 
o O A A e 
partir ” 
po. aj Arte de comparta esta pu 19ga en cuenta que contiene: 
er Properdedes del docur ombre de e A 
| 











+. Digita un nombre por ejemplo, miprimeramacro. 
. Verifica que sea del tipo Libro de Excel habilitado para macros. 
+ Haz clic en Guardar. 


Guardar como 
(2 WwoorSiRImarusl_excel 2010 


7] 0) mi_priemra_macro 
| [Chmacros 

¡grafico 

FOTOS 
archivos2003 
basico 


3. Digita un. 
nombre 











¡bro de Excel habilitado para macros Y 








Para habilitar las seguridades de las macros realiza lo siguiente: 
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A oz 
.Q>e$2 
aa Ejecutar tune Or duslogo 

Setroles, 20 LHoclgar z 

5 

6 H , 3 x L M N o bl 
14 
DL 
16 
Y 
15 
19 
2 
a 
2 
23 
24 
25 
26 
7 
2. 
29 
0 
2 
En 
a 

104 0%) Mojar, Hoz Hays qaL Z ñ set 

a TE O] 


+. Selecciona la pestaña Programador. 
+. Haz clic en Seguridad de macros. 
+. Se visualiza: 


Centro de confianza 





Editores de confianza 


Configuración de macros 


Ubicaciones de confianza 
O Deshabilitar todas las macros sin notificación 
DOSURIENIO E 2OAtDIA. O) Deshabilitar todas las macros con notificación 


Complementos em» 


, (6) Habilitar todas las macros [no recomendado; puede ejecutarse código posiblemente peligroso] 
Configuración de ActiveX | 
Ñ 1] O g ón de la del 09 do 


vista protegid 


Barra de mensajes 
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+ Haz clic en Configuración de macros 

. Selecciona Habilitar todas las macros (no recomendado; puede 
ejecutar código posiblemente peligroso) 

. Haz clic en Aceptar 


TRABAJAR CON CONTROLES ACTIVEX 


Una de las opciones más interesantes que tiene Excel 2010 es la de utilizar los 
“cuadros de control”. Los cuadros de control se aplican para crear 
verdaderos programas en Excel y pueden ser de mucha utilidad. 


La herramienta de Controles ActiveX está ubicada en el grupo Controles de 
la pestaña Programador. 


Para esto realiza lo siguiente: 


+. Selecciona la ficha Programador. 
+. Localiza el grupo Controles. 






1. Selecciona 


Programador 


EN 








2. Visualiza el 
grupo de 


. Selecciona Insertar. 
. Visualiza los Controles ActiveX. 
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ágina Fórmulas Datos Revisar 


[«—— 
| pame 
¡e 
[e 


complementos Complementos 
COM 


Complementos 






odo z : ! 
diseño Y Ejecutar cuadro de diálogo 


Controles de formulario ES 


¡ABE SADO 
DOLL E JUe3al88 A 


4. Visualiza el grupo de. 
ia 






Dentro de este grupo de Controles se pueden identificar las opciones más 


importantes: 
1.Insertar: Inserta los objetos de formularios y de los Controles ActiveX. 


2. Modo Diseño: Permitirá trabajar en el diseño de los Controles ActiveX. 


3. Propiedades: Visualiza las propiedades de cada objeto. 
4. Ver código: Permite agregar, editar y modificar el código a cada control. 


Revisar Vista Programador 
SY pZ Propiedad 
QH Ver códig 


Insertar Modo mn 
Diseño A Ejecutar cuadro de diálogo 


Controles 


> 








Práctica 


En la empresa te han solicitado diseñar un menú con varios botones que al 
presionarlos pasen a las distintas opciones. Para dar solución al problema 


propuesto realiza lo siguiente: 


+. Crea las hojas: Menú, Ventas y Tabla dinámica. 
+. Selecciona la hoja Menú. 
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Tabla dinámica 


hs] 






ventas , 





| 1, Selecciona 
a hoja Menú 





+. Selecciona la ficha Programador. 
+ Localiza el grupo Controles. 

+ Haz clic en Insertar. 

+ Localiza el grupo Controles. 

. Selecciona el Botón de comando. 


a 
e 
a 
a 


Libro1 - Microsoft Excel 


Ea Inicio Insertar Di Datos Revisar Vista 


et mr P] Grabar macro > Erro 
= E usar referencias re 


== ¿ver código 
Visual Macros 580 
Basic A Seguridad de macr: eño A Ejecutar cuadro de di 
















ml 






2. Selecciona 






Código || Controles de formulario F* 

















Inserta un control de botón de comando: 





+ Dibuja el objeto en un área de tu hoja de cálculo. 

+. Selecciona el botón de comando. 

+ Haz un clic derecho sobre el botón que seleccionaste. 
. Selecciona Propiedades. 
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(2) do-o z macroejemplo - Microsoft Excel E 


En Inicio Insertar Diseño de página Fórmulas Datos Revisar Vista Programador 


e e) 2] Grabar macro 2 ES [83] by Propiedades 
—U [E Usar referencias relativas ú 3 > » GP Ver código 



















Visual Macros Complementos Complementos Insertar 
Basic As Seguridad de macros COM - 3 Ejecutar cuadro de diálog 
L Código Complementos | Controles 
CommandButtonl + Je  =INCRUSTAR("Forms.CommandButton.1";”") 
A B € D E F 6 H 
1 
2 - 
3 5. Selecciona el botón. 
4 o a 
É Haz clic derecho 
6 o CommandButton1 : € 
7 l Cortar 
8 Za Copiar 
9 A Pegar 
10 
== CommandButton2 
e] Ver código AS _ 





Objeto Botón de comando xs 


Ñ 6. Haz clic en 


Propiedades 


pap 
5 


Agtupar 


pu 
Un 


Ordenar 






16 
17 


Se visualiza el cuadro de diálogo Propiedades. 

De este cuadro de propiedades se pueden diferenciar dos propiedades muy 
importantes: 

(Name): Se refiere al nombre que se hará referencia durante la programación. 
Este nombre debe cumplir con la sugerencia de los nombres de las macros. Si 
aplicamos buenas prácticas de programación y siendo este objeto un botón que 
enlazará a la hoja ventas lo llamaremos. btnventas. 


3, Formato de control. 


Sugerencias para el nombre de la macro: 
. No iniciar con números, no contener espacios en blanco, ni caracteres 
especiales ((W, €), ni palabras reservadas del lenguaje de programación 
(else, if, end). 


Caption: Esta propiedad es el nombre que se visualiza sobre el objeto; es decir 
es transparente para el usuario. Para el ejemplo lo llamaremos Ir a Ventas. 
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| 7. En Name digita un. 
nom bre. 












digita un 





nombre para 


Se visualiza: 


CAN AAA 


| archivo | Inicio Insertar Diseño de página Fórmulas Datos 


a 85 Grabar macro 2 


da Usar referencias relativas 





Visual Macros Complementos Complementos 
Basic Ay Seguridad de macros COM 
Código Complementos 



















1 

2 

3| 

4| 

- rav Os 

| ra Ventas : A 
- | 9. Visualiza e 
8 resultado. 

5 4 

10 

1 CommandButton2 

12 
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CAMBIAR DE APARIENCIA AL BOTÓN DE COMANDO 


Si deseas cambiar la apariencia del botón, puedes iniciar cambiando el color de 
fondo del botón, el color, estilo, y tamaño de la fuente. 


Para cambiar el color de fondo realiza lo siguiente: 


. Selecciona el botón. 

. Haz clic derecho, selecciona Propiedades. 

+ Enel cuadro de diálogo de Propiedades, selecciona la propiedad 
Backcolor. 


ai ld ia m 
*% paa 7 Grabar macro $ == 10] AER propiedades 
Ud 2 [usar referencias relativas 3 > Per código 
Visual Macros Complementos Complementos Insertar 
le Ax Seguridad de macros COM > Y Ejecutar cuadro de diálogi 
Código Complementos Controles ñ 
btnventas ” Fe =INCRUSTAR("Forms.CommandButton,1”;"") 


A 






RE MEETS 


14 1. Selecciona 
16 el botón. Haz 
18 clic derecho, 





+. Enla lista se visualiza los colores del Sistema y de la Paleta. 
. Dela Paleta selecciona un color. 
. Visualiza el resultado. 
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Mia > e- 17 macroejemplo - Microsoft Excel [ 
EN Inicio Insertar Diseño de página Fórmulas Datos Revisar Vista Programador 


loo Em 9) Grabar macro $ “= OS 
== HBusar referencias relativas A EN 


Visual Macros Complementos Complementos Insertar 
Basic ¿3 Seguridad de macros COM + 


Código Complementos Controles 


A propiedades 
Y ver codigo 
9 Ejecutar cuadro de didk 








btnventas » (S fe | =INCRUSTAR("Forms.CommandButton.1";"") 
A B E] 








ww you p>w na! 





26 
Para cambiar el color de la fuente realiza lo siguiente: 


+. Selecciona el botón. 

. Haz clic derecho, selecciona Propiedades. 

+ En el cuadro de diálogo de Propiedades, selecciona la propiedad 
Forecolor. 

+ Enla lista se visualiza los colores del Sistema y de la Paleta. 

+ Dela Paleta selecciona un color. 
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Mid: o-i> macroejemplo - Microsoft Excel E 


| Arcniwo | inicio insertar Diseño de página Fórmulas Datos Revisar Vista Programador 


0 A uan ¿E y 
== ee Usar referencias relativas ” 


Visual Macros Compiementos Compiementos Insertar 
Basic A Seguridad de macros COM E 


Código Complementos Controles 
btnventas + Je | =INCRUSTAR("Forms.CommandButton.1";"") 
A 8 c O A 
Propiedades 
btaventas CommandButton 


Alfabética | Por categorías | 








$ Propiedades 
PH Ver código 
A Ejecutar cuadro de diátogo 











90 JO M2. 0N qm 





CommandButton2 


2. Haz clic en el color 
. que deseas 


Para cambiar el tipo, estilo y tamaño de la fuente realiza lo siguiente: 


. Selecciona el botón. 

. Haz clic derecho, selecciona Propiedades. 

+ Enel cuadro de diálogo de Propiedades, selecciona la propiedad Font. 
+. Se visualiza el cuadro de diálogo Fuente. 

+. En Fuente selecciona el tipo: Arial. 

. EnEstilo de fuente selecciona: Negrita. 

+ En Tamaño selecciona:10. 

+ Haz clic en Aceptar. 
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Propiedades E 






3 1.EnForeColor 
Selecciona un color 







Fuente 






fueede: 






7 - fmPicturePostionáboveCe 
2 
True 






lic en el tamaño 


. Visualiza el resultado. 


Xd 0 ei 


| Archivo | Inicio Insertar Diseño de página Fórmulas Datos 
a En 27 Grabar macro e ES b 
— = usar referencias relativas ñ 


Visual Macros d Complementos Complementos | in 
Basic A) Seguridad de macros 


Código Complementos 











A CI c D E 


160 JO wn a 





INSERTAR UN ICONO EN EL BOTÓN DE COMANDO 
Para insertar un icono en el botón de Controles ActiveX, te sugiero 
prepares los iconos con extensión .ico. 


Para insertar un icono realiza lo siguiente: 
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. Selecciona el botón. 

. Haz clic derecho, selecciona Propiedades. 

+ En el cuadro de diálogo de Propiedades, selecciona la propiedad 
Picture. 

+ En (Ninguno), haz clic en el botón... 


169] A q y y matrocjenmpi Micr ft Exce CONO POtS ie 010) 


Ea inicio Insertar Diseño de página Fórmulas Datos Revisar Vista Programador Formato 





Mmzoz... 2 a 8 
-U [usar referencias relativas . 


Visual Macros Compiementos Complementos insertar 
Bash ÁS Seguridad de macros COM e: 





le y Propiedades 

Qu Ver código ej Pac 
La] 

a! Y Ejecutar cuadro de diálogo pAdt 







Código Complementos Controles 





binventas > E fe | =INCRUSTAR("Forms.CommandButton.1";"") 
A 2 c D 

















DA 


1. Selecciona el 





jotón, selecciona 
2. En Pietro Ea 


Clic en los ... 





+. Se visualiza el cuadro de diálogo Cargar imagen. 

. Selecciona el archivo de extensión .ico. Los archivos .ico son archivos 
diseñados para cargar exclusivamente en los botones. de comando. 
Puedes buscar en tu disco duro archivos de extensión .ico e insertar en 
este tipo de botones. Sólo se insertan los que son compatibles con 
Microsoft. 

+ Haz clic en Abrir. 


45 


INTRODUCCIÓN A LA PROGRAMACIÓN EN EXCEL CON 


VISUAL BASIC APPLICATION 


a hicrosoft Visual Basic para Aplicaciones - macrosjemplo.xlsx [diseño] 


7 Archivo Edición Ver Insertar Formato Depuración Ejecutar Herramientas Complementos Ventana Ayuda 


A" ASIN TN ER EN? EOS 


A 


- macroejemplo.xlsx - Hofai (Código) 








. Visualiza el resultado. 


ma» o-|> matroejemplo - Mierosott Excel 


EN inicio Insertar Diseño de pigina Fórmulas Datos Revisar Vista | Programador 


* 9) Grabar macro Sd l= $ AP Propiedades 
43 ¿ ¡Es 
2 -- . Aver codigo 


s E] Usar referencias relativas 
Visual Macros Complementos Complementos Insertar 





Basic és Seguridad de macros com . 9 Ejecutar cuadro de diálogo 





Codigo Complementos Controles 


btnventas ww í% fe =INCRUSTAR("Forms.CommandButton.1”/"") 





A B ce D 


BRRERES0»u bed Dd Sud had ind Les ». |] 





¿lane iplela 
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INSERTAR CÓDIGO EN EL BOTÓN DE COMANDO 


Si deseas navegar entre las hojas Menú, Tabla dinámica y Ventas se requiere 


insertar un código de programación en los botones creados. 
Para insertar el código realiza lo siguiente: 


. Selecciona el botón. 
e Haz doble clic. 


ias e- + macroejemplo - Microsoft Excel 


EN Inicio Insertar Diseño de página Fórmulas Datos Revisar Vista Programac 


HH Propiedades 


e En 97) Grabar macro e a po! A 





























ES Usar referencias relativas Qe ver codigo 
Visual Macros Complementos Complementos insertar 
Baste Ay Seguridad de macros COM y Y Ejecutar cuadro € 
Código z Complementos Controles 
btnventas > ( fe | =INCRUSTAR("Forms.CommandButton.1";"") 
| A B c D E F G 
1 
2 
3 
4 
5 
E lr a Ventas 
7 a 
8 
9 
10 
11 
12 = 
13. 1. Selecciona el botón. 
14 a 
15 


+. Se visualiza el ambiente de Visual Basic Applications. 


+ Sino visualizas el panel de la izquierda, puedes activar desde Ver al 


hacer clic en Explorador de proyectos. 


+ Observa que el cursor se ubica en el área en donde debes digitar el 


código. 


+. Pon atención en el nombre que se ubica en el panel de la izquierda en el 
nombre entre paréntesis; contiene el nombre de la hoja con la cual 


deseas enlazar. 


+. En la programación para hacer referencia a la hoja ventas, el nombre 


que tomarás será Hoja2 
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a 23 Pm a Sub btnventas_Click() 
E A sorry 
ha Sub 


0 








.  Digita Hoja2. 

+. Observa que al digitar el punto (.) automáticamente VBA despliega una 
pantalla de opciones. 

+ Haz doble clic en Activate. 











+. El código digitado es: Hoja2.Activate, este código indica que estás 
activando la Hoja2(ventas) en este caso se enlazará con la hoja ventas 
que es visible para el usuario final. Hoja2 es el Name de la hoja, es decir 
es el nombre que se hace referencia en la programación. 


+. Para regresar al ambiente de Excel, haz clic en el icono 
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> 00] Anda (Codigo)] 






Lao pres VBAProject 5 PT E 


a a Ea Private Sub btnventas Click() 

8 wonrojet(ventasadam) | [[MEJAZ-TEEIvate 
= 83 Microsoft Excel Objetos UT vá code oen Y 
E) Pojal (Meri) , 

8) hiojaz (ventas) 
Hoja3 (Tabla dinámica) 
ThiswWorkbook 





. Visualiza el botón Ir a Ventas en el ambiente de Ms Excel. 

. Para que el botón funcione, desactiva el Modo Diseño. Es decir antes 
de hacer clic en el botón Ir a Ventas la opción Modo Diseño no debe 
estar en color naranja. 


. Visualiza el ambiente de Ms Excel. 

+. El botón Ir a Ventas está listo para hacer clic. 
e Haz clic en Ir a Ventas. 

+. Visualiza la hoja ventas. 


Aplica el mismo criterio para programar el botón Ir a Tabla Dinámica. 


+. Selecciona el botón. 

+ Haz doble clic. 

+. Se visualiza el ambiente de Visual Basic Applications. 

+ Sino visualizas el panel de la izquierda, puedes activar desde Ver al 
hacer clic en Explorador de proyectos. 

+ Observa que el cursor se ubica en el área en donde debes digitar el 
código. 

. Pon atención en el nombre que se ubica en el panel de la izquierda en el 
nombre entre paréntesis; contiene el nombre de la hoja con la cual 
deseas enlazar. 

+. Enla programación para hacer referencia a la hoja Tabla dinámica, el 
nombre que tomarás será Hoja3 

.  Digita Hoja3. 

+ Observa que al digitar el punto (.) automáticamente VBA despliega una 
pantalla de opciones. 

+ Haz doble clic en Activate. 

+ El código digitado es: Hoja3.Activate, este código indica que estás 
activando la Hoja3 (Tabla dinámica) en este caso se enlazará con la 
hoja Tabla dinámica que es visible para el usuario final. Hoja3 es el 
Name de la hoja, es decir es el nombre que se hace referencia en la 
programación. 
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e Mal 





VISUAL BASIC APPLICATION 





rosoft Visual Basic 





Private Sub btnvrent 
Hoja (Tabís dinámica) Hojal.Actívate 
Thisvorkbook End 3uw 


De similar forma, programa el botón Ir a Menú, en donde podrás 
navegar en tu libro de Ms Excel. 

Selecciona el botón. 

Haz doble clic. 


Se visualiza el ambiente de Visual Basic Applications. 

Si no visualizas el panel de la izquierda, puedes activar desde Ver al 
hacer clic en Explorador de proyectos. 

Observa que el cursor se ubica en el área en donde debes digitar el 
código. 

Pon atención en el nombre que se ubica en el panel de la izquierda en el 
nombre entre paréntesis; contiene el nombre de la hoja con la cual 
deseas enlazar. 

En la programación para hacer referencia a la hoja Menú, el nombre que 
tomarás será Hoja1 

Digita Hoja1. 

Observa que al digitar el punto (.) automáticamente VBA despliega una 
pantalla de opciones. 

Haz doble clic en Activate. 

El código digitado es: Hoja1.Activate, este código indica que estás 
activando la Hoja1(Menú) en este caso se enlazará con la hoja Menú 
que es visible para el usuario final. Hoja1 es el Name de la hoja, es decir 
es el nombre que se hace referencia en la programación. 

Para regresar al ambiente de Excel, haz clic en el icono . 
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AA a 


cho VBAPtoject 









VBAProject (rentas. sm 


3 Microsoft Excel Objetos Private Sub brnmenu_Click() 
1) Hojal (Menú) Hojal.Activate 
il) Hoja? (ventas) End Sub 
Hoja3 (Tabla dinámica) 
ThisWorkbook 





. Visualiza el ambiente de Ms Excel. 
+. El botón Ir a Menú está listo para hacer clic. 
e Haz clic en Ira Menú. 


Para mejorar la interfaz de la hoja Menú. 


+. Selecciona la ficha Insertar. 

+ Haz clic en Imagen. 

+. Selecciona una imagen en formato .jpg. 
+ Haz clic en Insertar. 


+. Visualiza el resultado. 
Ahora para quitar las Líneas de cuadrícula, realiza lo siguiente: 


. Selecciona Vista. 

e Haz clic en Mostrar u ocultar. 

e Haz clic en la casilla Líneas de cuadrícula. 
+. Quita el visto de la casilla. 


Visualiza el resultado. 


Para navegar en el libro, salga del Modo de Diseño y navega con los botones 
que programaste. 

Más adelante utilizarás estos botones para cargar formularios desde VBA en 
Excel. 

También puedes añadir el código de las macros que grabaste con la 
grabadora. 
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CREAR FORMULARIOS 


Ahora aprenderemos a dominar lo máximo de Excel que es crear formularios y 
programarlos, bueno un formulario es una ventana que se programa por medio 
de controles y estos controles responden a sucesos que nosotros 
programamos. Todo esto se encuentra dentro de Visual Basic. 

A continuación muestro como crear un formulario y como programarlo. 
Iniciemos: 

Primero crearás una interfaz en el ambiente de Excel, para esto realiza lo 
siguiente: 


. Selecciona la ficha Insertar. 
e Haz clic en WordArt. 
. Selecciona un diseño. 


Digita un nombre, por ejemplo Clientes. 


.  Digita las etiquetas Nombre en la celda A7. 
.  Digita las etiquetas Dirección en la celda B7. 
.  Digita las etiquetas Teléfono en la celda C7. 


Selecciona una hoja. 


e Haz clic derecho. 
. Selecciona Ver código. 


También puedes presionar simultáneamente las teclas Alt + F11, para entrar al 
editor de Visual Basic. 


Visualiza en ambiente de VBA. 

Activa las siguientes opciones: 

Da clic en el menú Ver. 

Selecciona la opción Explorador de Proyectos. 
Da clic en el menú Insertar. 

Haz clic en UserForm. 
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. Visualiza el formulario 





+. Selecciona el formulario. 

+ Haz clic en Propiedades. 

+ Visualiza el cuadro de diálogo de Propiedades. 
+ En Name digita frmclientes. 

+. En Caption digita: Agregar clientes. 

. En Backcolor selecciona un color. 
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e Haz clic sobre el formulario. 
. Se activa el Cuadro de herramientas. 


+. Selecciona el objeto Label que se representa con el icono A E 
+. Dibuja el objeto en el formulario. 
+ Haz clic dentro de la etiqueta y escribe: Nombre: 
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» 





+. Dibuja las demás etiquetas en el formulario. 


Priertar Lomo, Deputanto — Ejedar  tjeviamientas Complementos 
00 rr na NAS 








+. Frente a cada etiqueta coloca un TextBox o cuadro de texto, el objeto 


presenta el siguiente icono 
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Ed 


Para colocar las tres cajas de texto con el mismo ancho y alto realiza lo 
siguiente: 


Selecciona la primera caja de texto. 
Mantén presionada la tecla Shift. 
Selecciona los demás objetos. 

En la propiedad Height digita 20. 
En Width digita 120. 





+ Visualiza como lucen las cajas de texto con un alto de 20 y un ancho de 
120. 
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dp ¡ A 









Hejosossa a" 


dE 





ls z 


+. Ahora colocaremos nombres (Name) a las cajas de texto, por ejemplo a 
la caja que recibirá el nombre la llamarás TextBoxnombre, recuerda 
que a los nombres (Name) se aplican los criterios de los nombres de las 
macros. 


Sugerencias para el nombre de la macro: 
+ No iniciar con números, no contener espacios en blanco, ni caracteres 


especiales (O, 4), ni palabras reservadas del lenguaje de programación 
(else, if, end). 
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+. Ala caja que recibirá la dirección la llamarás TextBoxdireccion. 





+. Ala caja que recibirá el teléfono la llamarás TextBoxtelefono. 
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B 
0 
l 
1 





+ Ahora inserta un botón de comando, para esto haz clic en el icono 


al 


+. Dibuja el objeto. 


ant 
p] 


MN 





¡ 


Para mejorar la interfaz del botón realiza lo siguiente: 


+. Selecciona el botón. 

+ Haz clic derecho. 

. Selecciona Propiedades. 

. En Propiedades, en Name digita btninsertar, recuerda que a los 
nombres (Name) se aplican los criterios de los nombres de las macros. 


Sugerencias para el nombre de la macro: 
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* No iniciar con números, no contener espacios en blanco, ni caracteres 
especiales (0, 8), ni palabras reservadas del lenguaje de programación 
(else, if, end). 

. En Backcolor selecciona un color. 

+ En Caption digita Insertar. 

+. En Forecolor selecciona un color para la fuente. 

+ EnPicture inserta un icono. 

. EnPicturePosition selecciona una posición para el icono. 

+. Visualiza como luce el botón Insertar. 





+ Aplica el mismo criterio para el botón Salir. 

+. Selecciona el botón. 

+ Haz clic derecho. 

. Selecciona Propiedades. 

. En Propiedades, en Name digita btnsalir, recuerda que a los nombres 
(Name) se aplican los criterios de los nombres de las macros. 

. En Backcolor selecciona un color. 

+. En Caption digita Salir. 

+. En Forecolor selecciona un color para la fuente. 

+. EnPicture inserta un icono. 

. EnPicturePosition selecciona una posición para el icono. 

+. Visualiza como luce el botón Salir. 
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ESPE ARA 
e hos 








CARGAR UN FORMULARIO EN EXCEL 
Una macro es una serie de instrucciones que se almacenan para que se 


puedan ejecutar de forma secuencial mediante una sola llamada u orden de 
ejecución. 


A continuación aprenderemos a programar un botón para cargar un formulario 
desde el ambiente de VBA al ambiente Ms Excel. 
Para esto realiza lo siguiente: 


. Selecciona la ficha Programador. 
+ Localiza el grupo Controles. 
+ Haz clic en Insertar. 


S . 


. Selecciona el botón de comando 
. Selecciona el botón. 


+ Haz clic derecho. 

. Selecciona Propiedades. 

. En Propiedades, en Name digita btnagregar, recuerda que a los 
nombres (Name) se aplican los criterios de los nombres de las macros. 

+ En Backcolor selecciona un color. 
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En Caption digita Agregar. 

En Forecolor selecciona un color para la fuente. 

En Picture inserta un icono. 

En PicturePosition selecciona una posición para el icono. 
Visualiza como luce el botón Agregar clientes. 


Para agregar el código que permita cargar el formulario desde el ambiente de 
VBA en Excel, realiza lo siguiente: 


. Selecciona el botón. 
e Haz doble clic sobre el botón. 


Digita el código: 
Private Sub btnagregar_Click() 
Load frmclientes 
frmclientes.Show 
End Sub 


+ Haz clic en el icono E para regresar al ambiente de Ms Excel. 










4d tin3,Co117 






3 ESA RA egar_Clicktj 
,l frrmclientes. show 

1 Specialiffect 

AS StartUpPosition 

Y Tag 

9 TexiBowdireccion 


19 TedBowmombre 
14 TedBodeletono 






E 


. Para ejecutar el código cargado en el botón Agregar clientes, desactiva 
el Modo Diseño. 
+ Haz clic en el botón Agregar clientes. 
Visualiza que se cargará el formulario. 


Para que se cargue el formulario en una posición más adecuada en la pantalla 
del ambiente de Excel realiza lo siguiente: 


. Selecciona el formulario. 
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+ Haz clic derecho, selecciona Propiedades. 
+. En Left digita 250. 
+ En Top digita 250. 


Puedes jugar colocando valores en estas dos propiedades para lograr una 
mejor ubicación de tu formulario en tu pantalla de Excel. 










E 
| 


A] ¡ 


+ Visualiza la nueva ubicación en la que se carga el formulario. 


PROGRAMAR UN FORMULARIO 

Con las macros lo que se pretende es automatizar varias tareas y fusionarlas 
en una sola, añadiendo por ejemplo un botón en nuestro libro que al pulsar 
sobre él realice todas esas tareas. 

Para esto programaremos el formulario clientes que permitirá ingresar datos en 
la hoja de cálculo. 

En el ejercicio anterior realiza lo siguiente: 


. Ingresa al ambiente de VBA, al presionar simultáneamente las teclas 


ALT +F11. 
e Haz doble clic en el formulario frmclientes. 
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Click () 





Selecciona la primera caja de texto. 
Haz doble clic sobre el objeto. 





Se visualiza el área en donde se puede digitar el código. 
Digita el código: 


Private Sub TextBoxnombre_Change() 

Range("A8").Select 'Selecciona la celda A8 

ActiveCell.FormulaR1C1 = TextBoxnombre 'Escribe en A8 el contenido 
de la caja TextBoxnombre 

End Sub 


+. Eltexto precedido del apóstrofo (texto en color verde) no es interpretado 
por el compilador. 
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Private Sn TextBoxnowbre_ Change ¿() 


Pange ("40") Select "Seleccioania cuida AS 
Aictiveceli Formuiar1C1 += Textbormombre 'Pocr 
Ina Sw 





+. De similar forma procede para los objetos TextBoxdireccion. 
+. Selecciona la caja de texto. 

+ Haz doble clic sobre el objeto. 

+. Se visualiza el área en donde se puede digitar el código. 

+  Digita el código: 


Private Sub TextBoxdireccion_Change() 

Range("B8").Select "Selecciona la celda B8 
ActiveCell.FormulaR1C1 = TextBoxdireccion "Escribe en A8 el 
contenido de la caja TextBoxdireccion 

End Sub 





O bs IA Its 


IA A TA 








Private Sub TextEoxnonbrxe Change () 

Pabge("48”") Belecrt “YJeleccicanias crida AS 

Htivelell.FormulaR1C1 + TexuBoxrombre 'Esccibe en 45. li connenido 6s la caja Texticunormbre 
Trad Tu 


+. De similar forma procede para los objetos TextBoxtelefono. 
+. Selecciona la caja de texto. 

+ Haz doble clic sobre el objeto. 

+. Se visualiza el área en donde se puede digitar el código. 

+  Digita el código: 


Private Sub TextBoxtelefono_Change() 

Range("C8").Select *Selecciona la celda C8 

ActiveCell.FormulaR1C1 = TextBoxtelefono "Escribe en A8 el contenido 
de la caja TextBoxtelefono 

End Sub 


+ Haz clic en el icono E para regresar al ambiente de Ms Excel. 
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Eras. -.. >. y Private Di TexrBoxdiceccion Charge [) 
| Rosge ("BS") Select 'Selerciosola celán DO ' 4 
dtiveleli,Formulof1C1 - Textloxdicección 'Ercribe en Ab el romenids da la coja —— 

















Private Dan TexcEoxaopbre Changed) 

Pange("10*) Select '"Zeleocioania celda 13 

| Acrivecel1.FormuleR1C1 =» TexrBoxmombre 'Esccibe en AD el comenido 6e la ceja Textbornosbre 
Ena Fun 
Private Sub Texthoxteletorno Change (1 


Razqe ("08% Select "Zeleccitania celga k5 - 






letivelel1.FormulakiC1 += TextBoxtelefono 'Escr en 
End Sub 






+ Haz clic en el botón Agregar Clientes. 
+. Visualiza el formulario. 

+ Ingresa los datos. 

+. Visualiza los datos ingresados. 


A continuación aprenderás a programar el botón Insertar, para esto realiza lo 
siguiente: 


. Selecciona el botón Insertar. 
e Haz doble clic. 





+. Se visualiza el área en donde se puede digitar el código. 
+  Digita el código: 
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Private Sub btninsertar_Click() 
'inserta un renglón 
Selection.EntireRow.Insert 

"Empty limpia los Textbox 
TextBoxnombre = Empty 
TextBoxdireccion = Empty 
TextBoxtelefono = Empty 

"Envía el cursor a TextBoxnombre 
TextBoxnombre.SetFocus 

End Sub 


+ Haz clic en el icono E para regresar al ambiente de Ms Excel. 


Ingresa los datos, observa que se inserta un renglón. 


A continuación programarás el botón Salir, para esto realiza lo siguiente: 


. Selecciona el botón Salir. 
e Haz doble clic. 





+. Se visualiza el área en donde se puede digitar el código. 
.  Digita el código: 


Private Sub btnsalir_Click() 


End 
End Sub 


+ Haz clic en el icono E para regresar al ambiente de Ms Excel. 
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— Esirbar ra trtgrta 
MANDA 


Private Dub brninsertar Ciiox() 
- Y inserta uo renglón 
Eg Merocolt Cocel Obietos Selection, Eotiredor. Inpers 













WE) tóoja2 (Clertos) 'Espey limpia las Taxtbox 
MÍ) trojal (mej) Toxtboxnombre = Enply 
Hoja) (Mega) TextBoxdireccioón » Empry 
sworitodk TextBoxrelerono » Erpry 
=% y "Envia el cursor a Textrloxnoebre 
ER toncioctes 


Textboxnombre,3erFocus 








Do resvate Sub ben 
Ena | 
Mena sun 








Private Dub Texthoxdicecció 
Ranas (“KB"i.Solect *5elarciasnia em 1: 


. Prueba el botón Salir. 


TRABAJAR CON FÓRMULAS 


Es de suma importancia saber aplicar Formulas en Macros de Excel, ya que la 
mayoría de las hojas de cálculos las involucran, por ejemplo los Inventarios, las 
Nominas o cualquier otro tipo de hoja las llevan, es por eso que en este tema 
se muestra cómo manejar Formulas en Macros de Excel. 


Ingresa al ambiente de VBA, al presionar simultáneamente las teclas ALT + 
F11. 


Diseña en el ambiente de Excel una interfaz que contendrá: 


+ Un WordArt 
+ Un botón de Controles ActiveX. 
. Tres etiquetas, Nombre, Edad y Días vividos. 


Diseña un formulario en el ambiente de VBA que contendrá: 


+. Tres Label o etiquetas. 
. Tres Textbox o cuadros de texto. 
. Dos botones de comando. 


+ Los datos que se solicitarán serán el Nombre y la Edad, los Días 
Vividos se generaran automáticamente cuando insertes la edad. 

+. Para el botón diseñado desde los Controles ActiveX; el botón Agregar 
tendrá como Name el nombre btnagregar, que es el nombre que se 
hace referencia en la programación. 

+ En Caption digita Agregar. 


+. Mientras estés en el Modo Diseño. 
+ Haz doble clic sobre el botón Agregar. 
+  Digita el código: 
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Private Sub btnagregar_Click() 

Load frmedad "Carga el formulario frmedad 
frmedad.Show "Visualiza el formulario frmedad 
End Sub 


+. El formulario en el ambiente de VBA que contendrán los siguientes 
objetos con sus respectivos Name y Caption. 


+ El formulario en donde colocarás los objetos tendrá como Name: 
frmdias, el Caption será Calcular días vividos. 

El TextBox1 tendrá como Name TextBoxnombre. 

El TextBox2 tendrá como Name TextBoxedad. 

El TextBox3 tendrá como Name TextBoxdias. 

El Name del botón Insertar será btninsertar. 

El Caption del botón Insertar será Insertar. 

El Name del botón Salir será btnsalir. 

El Caption del botón Salir será Salir. 





Programación de los Controles:TextBoxnombre 


Private Sub TextBoxnombre_Change() 
Range("A9"). Select 
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ActiveCell.FormulaR1C1 = TextBoxnombre 
End Sub 


Programación de los Controles:TextBoxedad 


Private Sub TextBoxedad_Change() 
Range("B9").Select 
ActiveCell.FormulaR1C1 = TextBoxedad 
TextBoxdias = Val(TextBoxedad) * 365 
End Sub 


Se aplica Val que permite transformar un dato de tipo texto en número. 
Esto se debe a que los Textbox no son Numéricos y debemos de Convertirlos. 


El TextBoxdias guardara el total de la multiplicación del TextBoxedad por 365. 


Programación de los Controles:TextBoxdias 


Private Sub TextBoxdias_Change() 
Range("C9").Select 

ActiveCell.FormulaR1C1 = Val (TextBoxdias) 
End Sub 


Programación de los Controles: btninsertar 
Private Sub btninsertar_Click() 


Selection.EntireRow.Insert 'Inserta un renglón 
TextBoxnombre = Empty 

TextBoxedad = Empty 

TextBoxdias = Empty 
TextBoxnombre.SetFocus 

End Sub 


Programación de los Controles: btnsalir 


Private Sub btnsalir_Click() 
End 
End Sub 
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